object MPEGConfig_ClipRectForm: TMPEGConfig_ClipRectForm Left = 276 Top = 189 BorderStyle = bsDialog Caption = 'Clip frame' ClientHeight = 443 ClientWidth = 649 Color = clBtnFace Constraints.MinHeight = 470 Constraints.MinWidth = 657 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter Scaled = False ShowHint = True OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object Bevel2: TBevel Left = 119 Top = 286 Width = 418 Height = 150 Anchors = [akBottom] Shape = bsFrame end object ScrollBox1: TScrollBox Left = 5 Top = 6 Width = 640 Height = 272 Anchors = [akLeft, akTop, akRight, akBottom] PopupMenu = PopupMenu1 TabOrder = 0 OnDblClick = ResultVideoBoxDblClick object ResultVideoBox: TDXPaintBox Left = 0 Top = 0 Width = 636 Height = 252 AutoStretch = True Center = True KeepAspect = True Stretch = True ViewWidth = 0 ViewHeight = 0 Align = alClient OnClick = ResultVideoBoxClick OnDblClick = ResultVideoBoxDblClick end object DoubleClickLabel: TLabel Left = 168 Top = 122 Width = 322 Height = 12 Anchors = [] Caption = 'Double click here to select video source to display.' end object VideoScrollBar: TScrollBar Left = 0 Top = 252 Width = 636 Height = 16 Align = alBottom Enabled = False PageSize = 1 TabOrder = 0 OnChange = VideoScrollBarChange OnScroll = VideoScrollBarScroll end end object DefaultButton: TButton Left = 546 Top = 287 Width = 97 Height = 25 Anchors = [akRight, akBottom] Caption = 'Default' TabOrder = 1 OnClick = DefaultButtonClick end object OKButton: TButton Left = 546 Top = 379 Width = 97 Height = 25 Anchors = [akRight, akBottom] Caption = 'OK' ModalResult = 1 TabOrder = 2 OnClick = OKButtonClick end object CancelButton: TButton Left = 546 Top = 411 Width = 97 Height = 25 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object PageControl: TPageControl Left = 130 Top = 296 Width = 397 Height = 135 ActivePage = ClipRectTabSheet Anchors = [akBottom] Style = tsButtons TabOrder = 4 OnChange = PageControlChange object ClipRectTabSheet: TTabSheet Caption = 'Clip frame setting' object Label33: TLabel Left = 8 Top = 14 Width = 29 Height = 12 Caption = '&Top:' FocusControl = Video_ClipRect_Top end object Label37: TLabel Left = 8 Top = 41 Width = 28 Height = 12 Caption = '&Left:' FocusControl = Video_ClipRect_Left end object Label24: TLabel Left = 138 Top = 14 Width = 30 Height = 12 Caption = '&Bottom:' FocusControl = Video_ClipRect_Bottom end object Label25: TLabel Left = 138 Top = 41 Width = 30 Height = 12 Caption = '&Right:' FocusControl = Video_ClipRect_Right end object ClipSizeLabel: TLabel Left = 118 Top = 65 Width = 24 Height = 12 Caption = '----' end object Bevel3: TBevel Left = 0 Top = 0 Width = 386 Height = 2 Anchors = [akLeft, akTop, akRight] end object ClipSizeCaptionLabel: TLabel Left = 8 Top = 65 Width = 99 Height = 12 Caption = 'Size after clipping:' end object Bevel6: TBevel Left = 0 Top = 82 Width = 388 Height = 2 Anchors = [akLeft, akTop, akRight] end object Video_ClipRect_Top: TSpinExEdit Left = 54 Top = 10 Width = 69 Height = 21 AlignValue = False CanFloatValue = False Increment = 1 MaxValue = 10000 TabOrder = 0 Value = 0 OnChange = Video_ClipRectChange OnKeyDown = EditKeyDown end object Video_ClipRect_Left: TSpinExEdit Left = 54 Top = 37 Width = 69 Height = 21 AlignValue = False CanFloatValue = False Increment = 1 MaxValue = 10000 TabOrder = 2 Value = 0 OnChange = Video_ClipRectChange OnKeyDown = EditKeyDown end object Video_ClipRect_Bottom: TSpinExEdit Left = 184 Top = 10 Width = 69 Height = 21 AlignValue = False CanFloatValue = False Increment = 1 MaxValue = 10000 TabOrder = 1 Value = 0 OnChange = Video_ClipRectChange OnKeyDown = EditKeyDown end object Video_ClipRect_Right: TSpinExEdit Left = 184 Top = 37 Width = 69 Height = 21 AlignValue = False CanFloatValue = False Increment = 1 MaxValue = 10000 TabOrder = 3 Value = 0 OnChange = Video_ClipRectChange OnKeyDown = EditKeyDown end object Video_Mask_Top: TCheckBox Left = 268 Top = 8 Width = 117 Height = 17 Caption = 'Top mask' TabOrder = 4 OnClick = Video_ClipRectChange end object Video_Mask_Bottom: TCheckBox Left = 268 Top = 26 Width = 117 Height = 17 Caption = 'Bottom Mask' TabOrder = 5 OnClick = Video_ClipRectChange end object Video_Mask_Left: TCheckBox Left = 268 Top = 44 Width = 117 Height = 17 Caption = 'Left Mask' TabOrder = 6 OnClick = Video_ClipRectChange end object Video_Mask_Right: TCheckBox Left = 268 Top = 61 Width = 117 Height = 17 Caption = 'Right Mask' TabOrder = 7 OnClick = Video_ClipRectChange end object ClipPreviewCheckBox: TCheckBox Left = 8 Top = 88 Width = 257 Height = 17 Caption = 'Resized image is used to display preview' TabOrder = 8 OnClick = PageControlChange end end object ImageArrangeTabSheet: TTabSheet Caption = 'Arrange setting' ImageIndex = 1 object Label11: TLabel Left = 8 Top = 14 Width = 90 Height = 12 Caption = '&Arrange Method:' FocusControl = Video_ImageArrange end object Label12: TLabel Left = 214 Top = 38 Width = 6 Height = 12 Caption = 'x' end object Label15: TLabel Left = 296 Top = 38 Width = 43 Height = 12 Caption = 'pixels' end object Bevel1: TBevel Left = 0 Top = 61 Width = 388 Height = 2 Anchors = [akLeft, akTop, akRight] end object OutputFormatCaptionLabel: TLabel Left = 8 Top = 88 Width = 86 Height = 12 Caption = 'Output format:' end object OutputFormatLabel: TLabel Left = 106 Top = 88 Width = 24 Height = 12 Caption = '----' end object InputFormatCaptionLabel: TLabel Left = 8 Top = 72 Width = 86 Height = 12 Caption = 'Input format:' end object InputFormatLabel: TLabel Left = 106 Top = 72 Width = 24 Height = 12 Caption = '----' end object Bevel4: TBevel Left = 0 Top = 0 Width = 388 Height = 2 Anchors = [akLeft, akTop, akRight] end object Video_ImageArrange: TComboBox Left = 144 Top = 10 Width = 233 Height = 20 Hint = 'Set how to arrange Source Video'#13#10#13#10'<> Center'#13#10#13#10'Movie will be di' + 'splayed at the center of window.'#13#10#13#10'<> Center (keep aspect ratio' + ')'#13#10#13#10'Movie will be displayed at the center of window at the same' + ' time the aspect ratio is kept.'#13#10#13#10'<> Center (custom size)'#13#10#13#10'Mo' + 'vie will be displayed at the center of window in any size.'#13#10#13#10'<>' + ' Full screen'#13#10#13#10'Display with Maximized window.'#13#10#13#10'<> Full screen' + ' (keep aspect ratio)'#13#10#13#10'Maximize windows at the same time keepin' + 'g aspect ratio.'#13#10#13#10'<> Full screen (keep aspect ratio 2)'#13#10#13#10'Maxim' + 'ize windows at the same time keeping aspect ratio'#13#10'and displayed' + ' movie size in full screen.'#13#10#13#10'<> No margin(keep aspect ratio)'#13#10 + #13#10'Maximize the window so that no margin will appear, then someti' + 'me the edge of video is cut out.'#13#10 Style = csDropDownList ItemHeight = 0 TabOrder = 0 OnChange = Video_ImageArrangeChange OnKeyDown = EditKeyDown end object Video_ImageArrangeWidth: TSpinExEdit Left = 144 Top = 34 Width = 65 Height = 21 Hint = 'Set window size when the movie is displayed at the center of dis' + 'play.' AlignValue = False CanFloatValue = False FloatValue = 1 Increment = 2 MaxValue = 999999 MinValue = 1 TabOrder = 1 Value = 1 OnChange = Video_ImageArrangeWidthHeightChange OnKeyDown = EditKeyDown end object Video_ImageArrangeHeight: TSpinExEdit Left = 225 Top = 34 Width = 64 Height = 21 Hint = 'Set window size when the movie is displayed at the center of dis' + 'play.' AlignValue = False CanFloatValue = False FloatValue = 1 Increment = 2 MaxValue = 999999 MinValue = 1 TabOrder = 2 Value = 1 OnChange = Video_ImageArrangeWidthHeightChange OnKeyDown = EditKeyDown end end object FillColorTabSheet: TTabSheet Caption = 'Mask Color' ImageIndex = 2 object Bevel5: TBevel Left = 0 Top = 0 Width = 388 Height = 2 Anchors = [akLeft, akTop, akRight] end object FillColorPanel: TPanel Left = 99 Top = 24 Width = 153 Height = 65 BevelOuter = bvNone BorderStyle = bsSingle TabOrder = 0 OnDblClick = FillColorButtonClick end object FillColorButton: TButton Left = 271 Top = 44 Width = 75 Height = 25 Caption = 'Edit Color' TabOrder = 1 OnClick = FillColorButtonClick end end end object PopupMenu1: TPopupMenu Left = 350 Top = 166 object N1: TMenuItem Tag = 1 Caption = 'Original size' OnClick = N1Click end object N2: TMenuItem Tag = 2 Caption = 'Zoom 2x' OnClick = N1Click end object N3: TMenuItem Tag = 3 Caption = 'Zoom 3x' OnClick = N1Click end object N4: TMenuItem Tag = 4 Caption = 'Zoom 4x' OnClick = N1Click end object N5: TMenuItem Caption = '-' end object C1: TMenuItem Caption = '&Copy to clipboard' ShortCut = 16451 OnClick = C1Click end end object ColorDialog: TColorDialog Ctl3D = True Left = 24 Top = 304 end end